MODULE 'exec/nodes'
/*
#define IsListEmpty(x)    (x::mlh.tailpred = (x))
#define IsMsgPortEmpty(x) (x::mp.ln.tailpred = x::mp.ln)
*/
OBJECT LH
	Head:PTR TO LN,
	Tail:PTR TO LN,
	TailPred:PTR TO LN,
	Type:CHAR,
	Pad:CHAR

OBJECT MLH
	Head:PTR TO MLN,
	Tail:PTR TO MLN,
	TailPred:PTR TO MLN
